home *** CD-ROM | disk | FTP | other *** search
/ SPACE 2 / SPACE - Library 2 - Volume 1.iso / program / 483 / mkrscsrc / edit.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-04-26  |  10.9 KB  |  426 lines
  1. #include "stdio.h"
  2. #include "gemdefs.h"
  3. #include "obdefs.h"
  4. #include "osbind.h"
  5. #include "mkrsc.h"
  6. #include "globals.h"
  7. #include "strings.h"
  8.  
  9.  
  10.  
  11. /*    find the selected obj[i]....    find the obj[j].ob_next
  12.     or ob_head pointing to it, point obj[j].ob_next or ob_head to
  13.     obj[i].ob_next....  check that obj[obj[i].ob_next].ob_tail is not
  14.     pointing back to the deleted object and if so point it to obj[j].
  15.     .....   check that neither obj[j].ob_head nor
  16.     obj[j].ob_tail point to themselves and if so set them to -1.
  17.     Cannot erase obj[0] or menuboxes in menu trees
  18.     When titles are erased, their menu boxes must be erased as well
  19. */
  20.  
  21. int erase_obj()
  22. {
  23.     OBJECT *inwinptr;
  24.     int        i, j, start, imbox;
  25.  
  26. /*    Set up handy pointer to right window object tree    */
  27.  
  28.         inwinptr = thefrontwin->inwindow->objt;
  29.         thefrontwin->saved = FALSE;
  30.  
  31.     if(thefrontwin->inwindow->kind[0] == TMENU)
  32.         start = 3;
  33.     else 
  34.         start = 1;
  35.  
  36.     for(i=start;i<(thefrontwin->inwindow->count + 1);i++)
  37.         if( (inwinptr[i].ob_state & SELECTED) &&
  38.              (i != thefrontwin->inwindow->mbox) )
  39.         {    
  40.             for(j=0;j<(thefrontwin->inwindow->count + 1);j++)
  41.             {    if(inwinptr[j].ob_head == i)
  42.                     {    inwinptr[j].ob_head = inwinptr[i].ob_next;
  43.                         break;
  44.                     }
  45.                 if(inwinptr[j].ob_next == i)
  46.                     {    inwinptr[j].ob_next = inwinptr[i].ob_next;
  47.                         break;
  48.                     }
  49.             }
  50.             if( inwinptr[inwinptr[i].ob_next].ob_tail == i)
  51.                 inwinptr[inwinptr[i].ob_next].ob_tail = j;
  52.  
  53. /*    if selected obj was a menu title, delete its menubox    */
  54.  
  55.             if(inwinptr[i].ob_type == G_TITLE)
  56.             {    imbox =    thefrontwin->inwindow->mbox;
  57.                     for(j=0;j<(thefrontwin->inwindow->count + 1);j++)
  58.                     {    if(inwinptr[j].ob_head == imbox)
  59.                             {inwinptr[j].ob_head = inwinptr[imbox].ob_next;
  60.                              break;
  61.                             }
  62.                         if(inwinptr[j].ob_next == imbox)
  63.                             {inwinptr[j].ob_next = inwinptr[imbox].ob_next;
  64.                              break;
  65.                             }
  66.                     }
  67.                     if( inwinptr[inwinptr[imbox].ob_next].ob_tail == imbox)
  68.                         inwinptr[inwinptr[imbox].ob_next].ob_tail = j;
  69.                 thefrontwin->inwindow->mbox = 0;
  70.             }
  71.             for(j=0;j<(thefrontwin->inwindow->count + 1);j++)
  72.             {    if(inwinptr[j].ob_head == j)
  73.                     inwinptr[j].ob_head = -1;
  74.                 if(inwinptr[j].ob_tail == j)
  75.                     inwinptr[j].ob_tail = -1;
  76.             }
  77.         break;  /* out of for i = ......    */
  78.         }
  79.     if(thefrontwin->inwindow->kind[0] == TMENU)
  80.         tidy_m();
  81.     else
  82.         ord_tree();
  83.  
  84.     draw_inwind(thefrontwin,0);
  85. }
  86.  
  87. int erase_tree()
  88. {
  89.     OBJECT    *inwinptr;
  90.     int    c, i, start;
  91.  
  92.     inwinptr = thefrontwin->inwindow->objt;
  93.  
  94.     start = 1;
  95.  
  96.     for(i=start;i<(thefrontwin->inwindow->count + 1);i++)
  97.         if(inwinptr[i].ob_state & SELECTED)
  98.         {    c = objc_delete(inwinptr,i);
  99.             free(thefrontwin->inwindow->treelink[i]);
  100.         }
  101. /*    ord_tree() will reorder tree and adjust count    */
  102.     ord_tree();
  103.     
  104.     for(i=start;i<(thefrontwin->inwindow->count + 1);i++)
  105.     {    inwinptr[i].ob_x = 20 + ((i-1)%8)*50;
  106.         inwinptr[i].ob_y = 20 + ((i-1)/8)*35;
  107.     }
  108.  
  109.     draw_inwind(thefrontwin,0);
  110.     thefrontwin->saved = FALSE;
  111. }
  112.  
  113. objtreeptr copy_tree(deselect)
  114.     int deselect;
  115. {
  116.     objtreeptr    tempmain, tempsub, inwinptr;
  117.     int i;
  118.  
  119.     tempmain  = (objtreeptr) malloc(sizeof(objtree));
  120.     tempsub  = (objtreeptr) malloc(sizeof(objtree));
  121.  
  122.     inwinptr = thefrontwin->inwindow;
  123.     thefrontwin->saved = FALSE;
  124.  
  125.     for(i=1;i<(inwinptr->count + 1);i++)
  126.     {    if(inwinptr->objt[i].ob_state & SELECTED)
  127.         {    if(deselect)
  128.                 inwinptr->objt[i].ob_state &= ~SELECTED;
  129.             tempmain->kind[0] = thefrontwin->inwindow->kind[i];
  130.             strcpy(tempmain->name[0],thefrontwin->inwindow->name[i]);
  131.             tempmain->icblk[0] = thefrontwin->inwindow->icblk[i];
  132.             tempmain->objt[0] = thefrontwin->inwindow->objt[i];
  133.             tempmain->objt[0].ob_state &= ~SELECTED;
  134.             tempmain->treelink[0] = tempsub;
  135.         
  136.             *tempsub = *inwinptr->treelink[i];
  137.             tempsub->kind[0] = tempmain->kind[0];
  138.             draw_inwind(thefrontwin,0);
  139.  
  140.             return(tempmain);
  141.         }
  142.     }
  143.             return(NULL);
  144. } 
  145.  
  146.  
  147. int    paste_tree(tempmain)
  148.     objtreeptr    tempmain;
  149. {
  150.     int result, num, nindex, i;
  151.     int cx,cy,cw,ch;
  152.     OBJECT *objptr2;
  153.     ICONBLK *ibptr;
  154.     objtreeptr    newsub, inwinptr;
  155.  
  156.     inwinptr = thefrontwin->inwindow;
  157.     thefrontwin->saved = FALSE;
  158.     
  159.     nindex = 0;
  160.     newsub  = (objtreeptr) malloc(sizeof(objtree));
  161.  
  162.     num = ++inwinptr->count;
  163.     inwinptr->kind[num] = tempmain->kind[0];
  164.     strcpy(inwinptr->name[num],tempmain->name[0]);
  165.     inwinptr->icblk[num] = tempmain->icblk[0];
  166.     inwinptr->objt[num] = tempmain->objt[0];
  167.     inwinptr->icblk[num].ib_ptext
  168.                          = inwinptr->name[num];
  169.     inwinptr->objt[num].ob_spec
  170.                         = (char *)&inwinptr->icblk[num];
  171.     *newsub = *tempmain->treelink[0];
  172.     inwinptr->treelink[num] = newsub;
  173.  
  174. /*    correct all of the pointers in the subtree    */
  175.  
  176.     for(i=0;i < newsub->count + 1;i++)
  177.     {    switch (newsub->objt[i].ob_type)
  178.         {
  179.             case G_TEXT        :
  180.             case G_BOXTEXT    :
  181.             case G_FTEXT    :
  182.             case G_FBOXTEXT    :
  183.                 newsub->objt[i].ob_spec = (char *)&newsub->ti[i];
  184.                 newsub->ti[i].te_ptext = newsub->strings[i];
  185.                 newsub->ti[i].te_ptmplt = newsub->template[i];
  186.                 newsub->ti[i].te_pvalid = newsub->valid[i];                
  187.                 break;
  188.             case G_BUTTON    :
  189.             case G_STRING    :
  190.             case G_TITLE    :
  191.                 newsub->objt[i].ob_spec = newsub->strings[i];
  192.                     break;
  193.             case G_ICON        :
  194.                 newsub->objt[i].ob_spec = (char *)&newsub->icblk[i];
  195.                 newsub->icblk[i].ib_ptext = newsub->strings[i];
  196.                     break;
  197.         }        
  198.     }
  199.  
  200.  
  201. /* set up a handy ptr */
  202.     objptr2 = &inwinptr->objt[num];
  203.  
  204. /* clear the pointers for the new object  */
  205.  
  206.     objptr2->ob_next = -1;
  207.     objptr2->ob_head = -1;
  208.     objptr2->ob_tail = -1;
  209.  
  210. /* set its position */
  211.  
  212.     objptr2->ob_x = 20 + ((num-1)%8)*50;
  213.     objptr2->ob_y = 20 + ((num-1)/8)*35;
  214.     
  215. /* make it a last object  */
  216.  
  217.     objptr2->ob_flags |= LASTOB;
  218.  
  219. /* get its new name, put into maintree name array */
  220.  
  221.     sprintf(inwinptr->name[num],"TREE%03d",++iconum);
  222.     
  223. /* point the tedinfo of the tree namer dialog to thetree->name */
  224.     {
  225.     ((TEDINFO *)newtree[NTEDIT].ob_spec)->te_ptext = 
  226.                                     inwinptr->name[num];
  227.     
  228.     result = do_dialog(newtree,NTEDIT);    /* newtree is object from RSC  */
  229.     newtree[NTOK].ob_state = NORMAL;
  230.     newtree[NTCANCEL].ob_state = NORMAL;
  231.  
  232.     if (result == NTCANCEL)
  233.         {    inwinptr->count--;
  234.             iconum--;
  235.             return;
  236.         }    
  237.     }
  238. /* link the new object into its parent   */
  239.  
  240.     result = objc_add(inwinptr->objt,nindex,num);
  241.     
  242. /* reset the LASTOB for the previous object in tree  */
  243.  
  244.     inwinptr->objt[num-1].ob_flags &= ~LASTOB;
  245.     
  246.     draw_inwind(thefrontwin,0);
  247. }
  248.         
  249. int copy_obj(deselect)
  250.     int deselect;
  251. {
  252.     objtree    *inwinptr;
  253.     int i;
  254.  
  255.     inwinptr = thefrontwin->inwindow;
  256.  
  257.     for(i=1;i<(inwinptr->count + 1);i++)
  258.         if(inwinptr->objt[i].ob_state & SELECTED)
  259.         {    if(deselect)
  260.                 inwinptr->objt[i].ob_state &= ~SELECTED;
  261.             tempo.okind = thefrontwin->inwindow->kind[i];
  262.             strcpy(tempo.oname,thefrontwin->inwindow->name[i]);
  263.             strcpy(tempo.ostrings,thefrontwin->inwindow->strings[i]);
  264.             strcpy(tempo.ovalid,thefrontwin->inwindow->valid[i]);
  265.             strcpy(tempo.otemplate,thefrontwin->inwindow->template[i]);
  266.             tempo.oti = thefrontwin->inwindow->ti[i];
  267.             tempo.oicblk = thefrontwin->inwindow->icblk[i];
  268.             tempo.oobjt = thefrontwin->inwindow->objt[i];
  269.             tempo.oobjt.ob_state &= ~SELECTED;
  270.             draw_inwind(thefrontwin,0);        
  271. /*            objc_draw(inwinptr->objt,i,10,thefrontwin->work.g_x,
  272.                         thefrontwin->work.g_y,
  273.                         thefrontwin->work.g_h,
  274.                         thefrontwin->work.g_w);
  275. */
  276.             spaste = TRUE;
  277.             return(1);
  278.         }
  279.         return(0);
  280. }
  281.  
  282. int paste_obj()
  283. {
  284.     int            nindex, x, y, sw, sh;
  285.     int result, num, obj_type, xoff, yoff, dummy, ev_bkstate;
  286.     int cx,cy,cw,ch;
  287.     OBJECT *objptr2;
  288.     objtreeptr thetree;
  289.     windowptr    thewin;
  290.  
  291.     graf_mouse(3,0);
  292.     evnt_button(1,1,1,&x,&y,&dummy,&ev_bkstate);
  293. /*    if the left-shift key is down wait for a button up and then
  294.     a second button dwn.
  295. */
  296.     if (ev_bkstate ==2)
  297.     {    evnt_button(1,1,0,&x,&y,&dummy,&ev_bkstate);
  298.         evnt_button(1,1,1,&x,&y,&dummy,&ev_bkstate);
  299.     }
  300.     graf_mouse(0,0);
  301.     
  302.     objptr2 = thefrontwin->inwindow->objt;
  303.  
  304. /*    objptr2 points to the active object tree in the window    */
  305.  
  306.     sw = tempo.oobjt.ob_width;
  307.     sh = tempo.oobjt.ob_height;
  308.     nindex = good_parent(objptr2,x,y,sw,sh,-2);
  309.     if(nindex == -1)
  310.         return;
  311.  
  312.     thewin = thefrontwin;
  313.     thetree = thefrontwin->inwindow;
  314.  
  315.     if (tempo.oobjt.ob_type == G_TITLE)
  316.     {
  317. /*    make sure you are moving a title to the menu bar    */
  318.         result = objc_find(thetree->objt,1,0,x,y);
  319.         if (result == 1)    
  320.         {    in_ttl(x,y,1);
  321.             draw_inwind(thefrontwin,0);
  322.         }
  323.         return;
  324.     }
  325.  
  326. /*    bail out if its a menu tree and the icon is not being dragged to a
  327.     menubox
  328. */
  329.  
  330.     if( (thetree->kind[0] == TMENU)
  331.         && (nindex != thetree->mbox
  332.             || tempo.oobjt.ob_type != G_STRING) )
  333.                 return;
  334.  
  335.     num = ++thetree->count;
  336.  
  337.     thetree->kind[num] = tempo.okind;
  338.     strcpy(thetree->name[num],tempo.oname);
  339.     strcpy(thetree->strings[num],tempo.ostrings);
  340.     strcpy(thetree->valid[num],tempo.ovalid);
  341.     strcpy(thetree->template[num],tempo.otemplate);
  342.     thetree->objt[num] = tempo.oobjt;
  343.  
  344. /* set up a handy ptr */
  345.     objptr2 = &thetree->objt[num];
  346.  
  347. /* clear the pointers for the new object  */
  348.  
  349.     objptr2->ob_next = -1;
  350.     objptr2->ob_head = -1;
  351.     objptr2->ob_tail = -1;
  352.  
  353. /* get the object type of object coming in    */
  354.  
  355.     obj_type = thetree->objt[num].ob_type;
  356.  
  357. /* set its position */
  358.  
  359.         objc_offset(thetree->objt, nindex, &xoff, &yoff); 
  360.         x -= xoff;
  361.         y -= yoff;
  362.         objptr2->ob_y = y;
  363.         objptr2->ob_x = x;
  364.         if(snap)
  365.         {    objptr2->ob_x += gl_wchar/2;
  366.             objptr2->ob_x &= 0xFFF8;
  367.             objptr2->ob_y += gl_hchar/2;
  368.             objptr2->ob_y &= (0xFFFF - gl_hchar + 1);
  369.         }
  370.  
  371. /* make if a last object  */
  372.  
  373.     objptr2->ob_flags |= LASTOB;
  374.  
  375. /* copy any necessary structures to the newtree structure  */
  376.  
  377.  
  378.     switch (obj_type)
  379.     {
  380.         case G_TEXT        :
  381.         case G_BOXTEXT    :
  382.         case G_FTEXT    :
  383.         case G_FBOXTEXT    : 
  384.             thetree->ti[num] = tempo.oti;
  385.             thetree->objt[num].ob_spec = (char *)&(thetree->ti[num]);
  386.             thetree->ti[num].te_ptext = thetree->strings[num];
  387.             thetree->ti[num].te_ptmplt = thetree->template[num];
  388.             thetree->ti[num].te_pvalid = thetree->valid[num];
  389.             break;
  390.         case G_BUTTON    :
  391.         case G_STRING    :
  392.         case G_TITLE    :
  393.             thetree->objt[num].ob_spec = thetree->strings[num];
  394.             break;
  395.         case G_ICON        :
  396.             thetree->icblk[num] = tempo.oicblk;
  397.             thetree->objt[num].ob_spec = (char *)&thetree->icblk[num];
  398.             thetree->icblk[num].ib_ptext = thetree->strings[num];
  399.             break;
  400.     }        
  401.  
  402.  
  403. /* link the new object into its parent   */
  404.  
  405.     if(thetree->kind[0] == TMENU)
  406.     {    thetree->objt[num].ob_width = min(thetree->objt[num].ob_width,
  407.                                 thetree->objt[thetree->mbox].ob_width);
  408.         thetree->objt[num].ob_x = 0;
  409.  
  410.         thetree->objt[num].ob_height = min(thetree->objt[num].ob_height,
  411.                                 thetree->objt[thetree->mbox].ob_height);
  412.         result = objc_add(thetree->objt,thetree->mbox,num);
  413.     }
  414.     else
  415.     {    thetree->objt[num].ob_width = min(thetree->objt[num].ob_width,
  416.                                 thetree->objt[0].ob_width);
  417.         thetree->objt[num].ob_height = min(thetree->objt[num].ob_height,
  418.                                 thetree->objt[0].ob_height);
  419.         result = objc_add(thetree->objt,nindex,thetree->count);
  420.     }
  421. /* reset the LASTOB for the previous object in tree  */
  422.  
  423.     thetree->objt[num-1].ob_flags &= ~LASTOB;
  424.  
  425. }
  426.